FoxPro/Visual FoxPro - <TAB> y <ESC>

Holas, nuevamente.

Dos preguntas:

1. ¿Cómo hago para que un usuario pueda utilizar <ESC> para salir de una ventana, en lugar de cerrarla con la X de la esquina superior iziquierda? Claro, las dos posibilidades deben estar disponibles.

2. ¿Cómo hago para que el solo hecho de posicionar el cursor en cualquier parte dentro de un campo de edición, haga que éste quede TOTALMENTE resaltado, como para efectuar una modificación completa del dato que se encuentra en ese momento? En otras palabras, quiero que el efecto sea el mismo de cuando se salta al campo utilizando <TAB>. He probado combinaciones de SelStart, SelLength y SelText, todas infructuosas.

Muchas gracias.

1 - Propiedad SelectOnEntry de los cuadros de texto.
2 - Propiedad Cancel de los botones de comando.

Bueno, perdona es al reves.

Muchas gracias por su colaboración Luis.

En cuanto al <ESC>, tendré que incluir entonces un commandbutton para poderlo activar. ¿No hay forma de asociarlo al evento Destroy del formulario?

En cuanto al <TAB>, efectivamente ya había probado SelectOnEntry, colocándolo en TRUE. Esto sirve para que al presionar <TAB> se seleccione completo el campo. Pero el problema que tengo consiste en que si el usuario coloca el cursor en algún punto del campo, éste no queda totalmente "azul", como sucede cuando se pasa a él con <TAB>. Por lo tanto, no queda fácil cambiar todo el valor. En este caso, el usuario debe resaltarlo por su cuenta, o devolverse al campo anterior y presionar <TAB> para volver al que desea cambiar.

¿Hay alguna solución?

Gracias nuevamente, Luis.

para salirte con la tecla <ESC> no es necesario que lo metas forzosamente dentro de un boton, puedes incluirlo en el evento Keypressed de tu FORMULARIO, ahora que si tienes un conjunto de formularios tienes que especificarlo en cada uno con algo como esto :

LPARAMETERS nKeyCode, nShiftAltCtrl
if nkeycode = 27
xresp = Messagebox("¿Quieres Salir del Módulo?",4+32,"AVISO")
if xresp = 7
return
endif
close data
thisform.release
endif

Voy a probar... Muchas gracias, Frederick.

con lo referente a q te aparezaca seleccionado el contenido de una caja de texto
puedes resolverlo haciendo un pequeño truco ....jejeje
en tu caja de texto coloca como verdadera la propiedad SelectOnEntry y en el evento Click de esta misma caja envia el foco a otro objeto (otra caja o un boton) y despues coloca nuevamente el foco en tu caja .. algo asi como

-*-*-**- Evento Click -*-*-*-*
with thisform
.otroObjecto.setfocus
this.setfocus
endwith

no tiene nada de ciencia.. pero resulve tu problema.

Ja, ja, ja... Claro, buen truco !!! Lo probaré. Muchas gracias, Frederick. Se le acredita !!!